home *** CD-ROM | disk | FTP | other *** search
/ Nejlepší České Hry / Nej české hry.iso / hry / krkal / !3dsmax! / krkal.ms < prev    next >
Text File  |  2003-11-30  |  2KB  |  88 lines
  1. fn setKRKALcamera = (
  2.  
  3.   c = $KRKALcamera
  4.   if c != undefined then
  5.      delete c
  6.  
  7.   c = freecamera name:"KRKALcamera" targetdistance:80 fov:37.30 orthoProjection:on
  8.  
  9.  
  10.   m = matrix3 [1,0,0] [0,1,0] [.35,-.35,1] [21,-21,80]
  11.  
  12.   c.transform = m
  13.  
  14.   freeze c
  15.   hide c
  16.  
  17. )
  18.  
  19. fn setKRKALlight shadows = (
  20.  
  21.   p=$ShadowBase
  22.   if p!=undefined then
  23.       delete p
  24.  
  25.   l=$KRKALlight
  26.   if l != undefined then
  27.     delete l
  28.  
  29.  
  30.   l = directionallight name:"KRKALlight" castshadows:shadows raytracedshadows:on hotspot:10000 falloff:10002 overshoot:on
  31.  
  32.  
  33.   rot = eulerangles 30 30 0
  34.   rotate l rot
  35.   move l [0,0,200]
  36.   
  37.   freeze l
  38.   hide l
  39.   
  40.   if shadows==true then
  41.   (
  42.     g=$geometry
  43.     g.primaryVisibility = off
  44.       plane name:"ShadowBase" width:100 length:100 Length_Segments:1 Width_Segments:1
  45.   )
  46.   else
  47.   (
  48.     g=$geometry
  49.     g.primaryVisibility = on
  50.   )
  51. )
  52.  
  53. fn setKRKALrenelems shadows = (
  54.   remgr = maxOps.GetCurRenderElementMgr()
  55.   remgr.removeallrenderelements()
  56.  
  57.   if shadows == false then
  58.   (
  59.  
  60.   el=KRKAL_Z_DEPTH
  61.   remgr.addrenderelement (el elementname:(el as string))
  62.   zdepth = remgr.GetRenderElement(0)
  63.  
  64.   zdepth.zmult = 0.819
  65.   zdepth.z_min=0
  66.   zdepth.z_max=255
  67.   
  68.   el=KRKAL_ALPHA
  69.   remgr.addrenderelement (el elementname:(el as string))
  70.   el=KRKAL_DIFFUSE
  71.   remgr.addrenderelement (el elementname:(el as string))
  72.   el=KRKAL_NORMAL
  73.   remgr.addrenderelement (el elementname:(el as string))
  74.   
  75.   )
  76.   else
  77.   (
  78.     el=KRKAL_SHADOW
  79.     remgr.addrenderelement (el elementname:(el as string))
  80.   )
  81.   
  82. ) 
  83.  
  84. shadows = off
  85.  
  86. setKRKALcamera () 
  87. setKRKALlight (shadows)
  88. setKRKALrenelems (shadows)